home *** CD-ROM | disk | FTP | other *** search
/ Chip: 2001 Haziran / CHIP Haziran2001.iso / prog / haziran / 20 / setup.exe / {app} / plugins / XQ WinNT Mouse Refresh.xpl < prev    next >
Encoding:
XSetup plugin  |  2001-03-28  |  1.6 KB  |  52 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="2"
  3. "COUNT"="1"
  4. "UIPATH"="Hardware\Mouse\General Options"
  5. "NAME"="Windows NT/2K Mouse Refresh Rate"
  6. "LANGUAGE"="VBScript"
  7. "VERSION"="1.07"
  8. "OSVERSION"="01010"
  9. "TEXT 1"="Rate"
  10. "DESCRIPTION 1"="Sometimes the mouse cursor in Windows NT flickers because the refresh rate of the mouse port is to slow."
  11. "DESCRIPTION 2"="You can use this setting to adjust the refresh rate of the port. The default value is 60, the highest value is 200 (higher number = smoother)."
  12. "DESCRIPTION 3"="NOTE: It has been reported that this setting has no effect if you are using an ACPI-compilant PC and Windows 2000."
  13. "AUTHOR"="Xteq Systems"
  14. "CONTACTURL"="http://www.xteq.com"
  15. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  16. "COMMENT 1"=" "
  17. "COMMENT 2"="Thanks to SMσK [mailto:smak-@gmx.net] for the bug-fix!"
  18.  
  19.  
  20. sP="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\i8042prt\Parameters\SampleRate"
  21.  
  22. 'Called when the Plugin is started
  23. SUB Plugin_Initialize
  24.     i=RegReadValue(sP)
  25.     if IsEmpty(i) then
  26.        SetUIElement 1,""
  27.     else
  28.        SetUIElement 1,i
  29.     end if
  30. END SUB
  31.  
  32. 'Called when the Plugin should validate the Data the user has entered
  33. SUB Plugin_CheckData(ElementIndex)
  34. END SUB
  35.  
  36. 'Called when the Plugin should apply the changes
  37. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  38.  s=GetUIElement(1)
  39.  
  40.  if len(s)<>0 then 
  41.   Call RegWriteValue(sP,s,1)
  42.   Call Restart
  43.  else
  44.   Call MsgError("Please supply a number!")
  45.  end if
  46.  
  47. END SUB
  48.  
  49. 'Called when the Plugin is about to be removed from memory
  50. SUB Plugin_Terminate
  51. END SUB
  52.